home *** CD-ROM | disk | FTP | other *** search
/ 3D Images / 3D Images.iso / programs / amiga / parpro / par230 / install < prev    next >
Encoding:
Text File  |  1995-01-12  |  1.9 KB  |  88 lines
  1. ; $VER: Install-PAR 1.1 © Digital Processing Systems (27-Jan-94)
  2. ; Script to install Personal Animation Recorder Software
  3. ;******************************************************************************
  4.  
  5. ; set source to the same as the installer script
  6. (set sourcedir (pathonly @icon))
  7.  
  8. (set makedir-help
  9.  (cat    "You will need to select a directory to put PAR.  "
  10.     "A drawer will be created if you select a directory that does not exist."
  11.  )
  12. )
  13.  
  14. ;**************************** request a target path ***************************
  15.  
  16. (set target
  17.  (askdir
  18.     (prompt "Please select a directory where the software for PAR will go.")
  19.     (help  makedir-help)
  20.     (default (tackon @default-dest "PAR"))
  21.  )
  22. )
  23.  
  24. (set @default-dest target)
  25.  
  26. ;****** Copy the PAR software, PARTest, README, etc. **********
  27. (copyfiles
  28.     (prompt "Copying PAR directory.")
  29.     (help @copyfiles-help)
  30.     (source (tackon sourcedir "PAR"))
  31.     (dest target)
  32.     (pattern "#?")
  33.     (files)
  34.     (infos)
  35. )
  36.  
  37. ;****** Make the importers directory, and copy importers ******
  38.  
  39. ; Copy all of the importers (radio buttons for experts)
  40. (copyfiles
  41.     (prompt "Copying Importers.")
  42.     (help @copyfiles-help)
  43.     (source (tackon sourcedir "PAR/Importers"))
  44.     (dest (tackon target "Importers"))
  45.     (pattern "#?")
  46.     (files)
  47.     (confirm)
  48. )
  49.  
  50.  
  51. ; Copy all of the Exporters (radio buttons for experts)
  52. (copyfiles
  53.     (prompt "Copying Exporters.")
  54.     (help @copyfiles-help)
  55.     (source (tackon sourcedir "PAR/Exporters"))
  56.     (dest (tackon target "Exporters"))
  57.     (pattern "#?")
  58.     (files)
  59.     (confirm)
  60. )
  61.  
  62.  
  63. ;********************* Copy PAR.Hex & PAR_PAL.Hex to S: ***********************
  64. (copyfiles
  65.     (prompt "Copying PAR.Hex to S:")
  66.     (source (tackon sourcedir "s"))
  67.     (pattern "#?.Hex")
  68.     (dest "S:")
  69. )
  70.  
  71.  
  72. ;******************* Copy any ARexx files *********************
  73. (if (> (exists "Rexx:" (noreq)) 1)
  74.  (copyfiles
  75.     (prompt "Copying ARexx files.")
  76.     (help "These files will allow you to do special things.")
  77.     (source (tackon sourcedir "Rexx"))
  78.     (dest "Rexx:")
  79.     (confirm)
  80.     (pattern "#?")
  81.     (infos)
  82.     (files)
  83.  )
  84.  
  85. )
  86.  
  87.  
  88.